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Burroughs Corporation believes the program described in this 
manual to be accurate and reliable, and much care has been 
taken in its preparation. However, the Corporation cannot 
accept any responsibility, financial or otherwise, for any con- 
sequences arising out of the use of this material. The infor- 
mation contained herein is subject to change. Revisions may 
be issued to advise of such changes and ‘or additions. 


SECTION 


FIGURE 


TABLE OF CONTENTS 


TITLE 


INTRODUCTION . .« «© « «© «© © «© © « 


SYSTEM DESCRIPTION . . . « «© « « 


COBOL CROSS-REFERENCE INPUT CONTROL. 


DISK SORT PROGRAM. .« «. « « « « « 


CROSS-REFERENCE LISTING. ... . 


LIST OF TLLUSTRATIONS 


TITLE 


B 2500/B 3500 COBOL Cross-Reference Utility 


System Flow. .« .« « « «© © « © © « 


Sample Listing of Input Program to CBXRIN. 


Sample Cross-Reference Listing . 


PAGE 


iv 


PAGE 


2-3 
4-2 


iii 


INTRODUCTION 


This manual describes the Burroughs B 2500/B 3500 COBOL Cross- 
Reference Utility System which utilizes the Burroughs technique of 
cross-referencing COBOL source programs written for the B 2500/ 

B 3500 Systems. 


COBOL programs are normally very lengthy due to the inherent nature 
of the language itself. They normally contain data elements by the 
hundreds, plus containing many procedure-names, thus causing time 
consuming manual perusal effort when a programmer is required to 
make a simple change in a program. A single programmatic change in 
the source language may affect many areas of a program with the 
possibility that an affected area will be far removed from that 
which was immediately changed and in turn can be easily missed by 
the most experienced programmer. The Cross-Reference Utility System 
allows a programmer to find all areas that a change will affect, at 


a glance. 


Cross-referencing speeds reflected in tests of typical COBOL pro- 
grams are exceptionally fast and provide all B 2500/B 3500 users 
with a documentation tool of great value, at a very small operational 


cost. 


The three programs involved with the system are available to B 2500/ 
B 3500 users commencing on the ASR #1 systems release as CBXRIN, 
CBXSRT, and CBXLST. 


The Burroughs Corporation takes pride in providing this system as a 
continuing effort to offer the user aids in reducing COBOL program 
maintenance expenditures through readily usable documentation facil- 


ities. 
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SECTION 1 
SYSTEM DESCRIPTION 


The B 2500/B 3500 COBOL Cross-Referencing Utility System consists 


of three programs (see figure 1-1): 


CBXRIN. The first program, CBXRIN, uses a COBOL source 
program as input and produces a disk file as output. The 
disk file output is used as input to the second (sort) 
program. CBXRIN also creates a listing of the input 


source program, if desired. 


CBXSRT. The second program, CBXSRT, is a disk sort program 
designed to arrange all output records from the first pro- 


gram into a usable sequence as input to the third program. 


CBXLST. The third program, CBXLST, formats the sorted data 
from the second program and produces a COBOL cross-reference 


listing of the original source language program. 


The B 2500/B 3500 COBOL Cross-Reference Utility System will operate 


on all B 2500/B 3500 Advanced Systems. The peripheral configuration 


required is: 


One card reader. 


One magnetic tape unit (if input 
source program is on a SOLT tape). 


One printer (8 lines per inch). 


One disk module. 
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Figure 1-1. B 2500/B 3500 COBOL Cross-Reference 
Utility System Fliow 
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SECTION 2 
COBOL CROSS-REFERENCE INPUT CONTROL 


The first program (CBXRIN ) uses a syntactically correct COBOL 
source program as input. The source program to be cross-referenced 


can be read from either punched cards or magnetic tape (SOLT). 
The control cards necessary for execution of the first program are: 


? EXECUTE CBXRIN 

? DATA SOURCE 

? DATAB SOURCE 

[ CARD | 

[ CDLIST | 

[ TAPE] 

[TPLIST | Input/output options. 


Source language input options. 


[ LISTCD | 
[LISTTP | 


All control card data starts in card column one. 


The EXECUTE control card notifies the MCP to call the first program 
(CBXRIN) from the disk library. 


The second control card is the MCP Label Card. 


a. ? DATA SOURCE indicates EBCDIC Source Language Input. 
b. °? DATAB SOURCE indicates BCL Source Language Input. 


Input /Output options which can be specified are as follows. If one 


of the listed options is not used, the CARD option will be assumed. 


a. CARD. The CARD option indicates that the input source 
program is in punched card form and that cross-referencing 


is desired. 


b. CDLST. The CDLST option indicates that the input source 
program is in punched card form and that a listing of the 
input program (see figure 2-1) is desired along with a 


cross-reference of the program, 


c. TAPE. The TAPE option indicates that the input source 
program is on magnetic tape with a label of "SOLT" and 


that cross-referencing is desired. 


d. TPLIST. The TPLIST option indicates that the input source 
program is on magnetic tape with a label of SOLT and that 
a listing of the input program is desired along with a 


cross-reference of the program. 


e. LISTCD. The LISTCD option indicates that the input source 
program is in card form and that an 80/80 listing is 
desired of the program without accomplishing a cross-~ 


reference. 


f. LISTTP. The LISTTP option indicates that the input source 
program is on magnetic SOLT tape and that an 80/80 listing 
is desired of the program without accomplishing a cross- 


reference. 


The second program of the system, CBXSRT, is scheduled automatically 
and executed at completion of the first program requiring options 


a, b; c, or d above, by a ZIP function within the first program, 
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Sample Listing of Input 
Program to CBXRIN 


Figure 2-1. 


SECTION 3 
DISK SORT PROGRAM 


The disk sort program (CBXSRT) is scheduled and executed without 


operator intervention by a ZIP from the first program. 


CBXSRT is a sort program which uses the disk file output from the 


first program as input to be sorted. 


The output from this sort program is written to a disk file labeled 


as SORTED. 


The third program in the utility system (CBXLST) is scheduled auto- 
matically and executed at completion of the sort by a ZIP function 


within the sort program. 


SECTION 4 
CROSS-REFERENCE LISTING 


The third program in the utility system (CBXLST) is scheduled and 


executed without operator intervention. 


The input to this program is a disk file labeled SORTED from the 


second program. 


The output is the cross-reference listing of the COBOL source pro- 


gram used as input to the first program. See figure 4-1 as an 


example listing. 


The listing consists of the following: 


a. FILE-CONTROL information. 


1) File-name. 

2) Hardware assignments. 

3) OPEN status. 

4) PILE ID. 

5) Lines OPEN on. 

6) Lines CLOSE on. 

7) Lines read on (if applicable). 

8) Lines written on (if applicable). 

9) Number of records for RERUN. 
10) RECORDING MODE. 
11) File-name of files sharing SAME-AREA. 

b. Data-names referenced by line number. 

1) Line number data-name defined on. 

2) Line numbers data-name referenced on. 

3) Library file-name to be copied into program and line 

number of copy statement. 
ec. Internal Program Switches. 

1) Line number of the first switch usage in the program. 
2) Switch-name. 

3) Line numbers of additional switch usage. 
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FILE NAME 


vISK=I°9 


DEFINED 


001600 
001700 
001800 
002710 
901400 
001500 
901900 
HELLO 

YOUALL 


002900 
002900 
002900 
003000 
002900 
003100 


003400 
003500 
03300 
03200 


PROGRAM I0? COBOL CROSS REFERENCE, 


COBNL CROSS REFERENCE 


AUTHORS BURROUGHS CORP, 


FILE DESCRIPTIONS 


ASSIGNED TO DISK 


JPENEO ON LINE 002300 
GLOSED ON LINE 003900 


READ ON LINES 


002800 


WRITTEN ON LINES 002500 003700 


RERUN EVERY 


9999 RECORDS 


RECORD AREA SHARE WITH OISK=N=T 
RECOROING MODE STANDARD 


DATA*NAME 


CODE=1 

COOE*1 

CO0E=2 

COPTEO SECTION 50 

DISkelreD 

OTSK! 

HELLO 

COPIED FROM LIBRARY ON LINE 
COPIED FROM LIBRARY ON LINE 


Swi 
SwW2 
SwW3 
Sw4 
SwW5 
SW6 


DATE 

TALLY 

TIME 
TODAYS*DATE 


Figure 4-1. 


REFERENCED 


THIS DATA@NAME DEFINED MORE THAN ONCE 
002600 002700 003000 003700 
002600 002700 003100 003300 003400 003500 
NO OTHER REFERENCE 
000800 001000 002300 002400 003900 
002500 003700 
008000 
001900 
002800 
INTERNAL PROGRAM SWITCHES 


003000 
003000 
003000 
003100 


SPECIAL REGISTERS 
004000 
004000 
004000 
004000 


Sample Cross-Reference Listing 


AS INPUT/OUTPUT VALUE OF ID 1S %8=3500", 


003700 


DATE 


03/17/68 


d. 


Special Registers. 


1) Line number that each special register is used on. 


tear along dotted line 
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